home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh4x / sh40.d64 / bks.what 5.0 (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  5KB  |  122 lines
  1. 0 AF=28:GOSUB1000:REM VERSION 7 - GANZ STARK VERBESSERT
  2. 1 DIMA$(AF):GOSUB200:OPEN4,4:X$=""+CHR$(13)+"
  3. 2 [152]4,"---------------------------------------
  4. 3 PRINT#4,"BASIC KONTROLL SYSTEM   ERKLAERUNGEN V7
  5. 4 [152]4,"---------------------------------------
  6. 5 PRINT#4,"OBIGE TABELLE GIBT AUSKUNFT UEBER ALLE LEICHTEN UND SCHWEREN FEHLER,
  7. 6 [152]4,"DIE IM GETESTETEN BASIC-PROGRAMM AUFGETRETEN SIND.
  8. 7 PRINT#4:PRINT#4,"BASIC-PROGRAMM            : "N$
  9. 8 PRINT#4,"TESTDATUM                 : "D$
  10. 9 PRINT#4,"VERSION DES TESTPROGRAMMES: "V$
  11. 10 PRINT#4:IFPEEK(52999)THEN13
  12. 11 PRINT#4,"DER FEHLER NR. 2 (UEBERFLUESSIGE LEERZEICHEN IM PROGRAMMTEXT)
  13. 12 [152]4,"WURDE NICHT GELISTET, DA ER ZU HAEUFIG AUFTRAT.":[152]4
  14. 13 RQ$[178]" RUNTIME-KONSEQUENZEN"[170]X$
  15. 14 [141]100:[152]4,"ERKLAERUNG DER FEHLER:
  16. 15 PRINT#4,"[163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]":PRINT#4,"BEISPIEL:
  17. 16 [152]4,"  2720: 17[1] UEBERFLUESSIGER BEFEHL
  18. 17 PRINT#4,"    ^   ^  ^  ^"X$;
  19. 18 PRINT#4,"    [221]   [221]  [221]  [202] ART DES FEHLERS (PAUSCHALTEXT)"X$;
  20. 19 PRINT#4,"    [221]   [221]  [221]"X$;
  21. 20 PRINT#4,"    [221]   [221]  [202] FEHLERGRAD: 1 = LEICHTER FEHLER OHNE"RQ$;
  22. 21 PRINT#4,"    [221]   [221]                2 = SCHWERER FEHLER, WIRD FEHLERMELDUNG"X$;
  23. 22 PRINT#4,"    [221]   [221]                    VERURSACHEN"X$;
  24. 23 PRINT#4,"    [221]   [221]"X$;
  25. 24 PRINT#4,"    [221]   [202] FEHLERCODENUMMER (SIEHE UNTEN)"X$;
  26. 25 PRINT#4,"    [221]"X$;
  27. 26 PRINT#4,"    [202] BASIC PROGRAMMZEILENNUMMER
  28. 27 [152]4
  29. 28 [152]4,"VERZEICHNIS DER VORKOMMENDEN FEHLERCODES MIT BEDEUTUNG:
  30. 30 PRINT#4,"[163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]
  31. 40 [129]I[178]1[164]AF:[139][194](53003[170]I)[178].[167]60
  32. 50 [152]4,A$(I)
  33. 60 [130]
  34. 80 [152]4:[152]4,"(C) NH-201187-ARR REV7
  35. 99 CLOSE4:END
  36. 100 IFPEEK(53000)THEN110
  37. 101 PRINT#4,"DER FEHLER NR. 8 (SPRUNG AUF REM- ODER TRENNZEILE)
  38. 102 [152]4,"WURDE NICHT GELISTET, DA ER ZU HAEUFIG AUFTRAT.":[152]4
  39. 110 [139][194](53002)[167]120
  40. 111 [152]4,"DIE FEHLER NR. 7 (GOTO -> STRUKTUR) UND NR. 17 (THEN GOTO)
  41. 112 PRINT#4,"WURDEN NICHT GELISTET, DA SIE ZU HAEUFIG AUFTRATEN.":PRINT#4
  42. 120 IFPEEK(53003)THEN130
  43. 121 PRINT#4,"DIE FEHLER NR. 12, 13 UND 14 WURDEN NICHT GELISTET.
  44. 122 [152]4
  45. 130 [142]
  46. 200 [129]I[178]1[164]AF:B$[178]""
  47. 202 [135]A$:[139]A$[178]"@"[167]210
  48. 204 B$[178]B$[170]A$[170][199](13):[137]202
  49. 210 A$(I)[178][200](B$,[195](B$)[171]1):[130]:[142]
  50. 1000 [129]I[178]52992[164]52996:A$[178]A$[170][199]([194](I)):[130]:[139]A$[179][177]"NSS88"[167]1100
  51. 1001 [139][194](53001)[178]123[167]1102
  52. 1002 [139][194](53001)[179][177]222[167]1100
  53. 1003 [129]I[178].[164]AF[171]1:A[178]A[170][194](I[170]53004):[130]:[139]A[178].[167]1104
  54. 1004 [133]"LOADDATUM   XX.XX.19XXCMDCMDCMDCMDCMDCMDCMDCMDCMDCMDCMDCMD";D$
  55. 1005 [133]"NAME PROGRAMM   XCMDCMDCMD";N$
  56. 1006 V$[178][199](48[170][194](52997))[170]"."[170][199](48[170][194](52998))
  57. 1007 [139]V$[179][177]"5.0"[167]1106
  58. 1008 [142]
  59. 1100 [153]"LOADBITTE ERSTELLEN SIE ERST EINE LISTE MIT DEM BKS (VERS. >= 5.0)":[128]
  60. 1102 [153]"LOADBITTE UNTERBRECHEN SIE DAS BKS PROGRAMM NICHT !":[128]
  61. 1104 [153]"LOADDAS TESTPROGRAMM ENTHIELT KEINE FEHLER !":[128]
  62. 1106 [153]"LOADFALSCHE VERSIONSNUMMER !
  63. 2000 DATA1 = DIREKT NACH DER ZEILENNUMMER FOLGT EIN NULLBYTE (DIES WIRD ZU LIST-
  64. 2002 DATA"    SCHUTZZWECKEN VERWENDET)",@
  65. 2004 DATA2 = IM PROGRAMMTEXT KOMMT EIN UEBERFLUESSIGES LEERZEICHEN VOR,@
  66. 2006 DATA"3 = EIN THEN, GOTO, LIST ETC. BEFEHL ZEIGT AUF EINE NICHT EXISTIERENDE
  67. 2008 [131]"    ZEILE",@
  68. 2010 [131]4 = DIE ZEILENNUMMER ALS PARAMETER IST GROESSER ALS 63999,@
  69. 2012 [131]5 = DIE ZEILENNUMMER ALS PARAMETER ENTHAELT FALSCHE ZEICHEN (BEISPIELS-
  70. 2014 [131]"    WEISE GOTO 4+6)",@
  71. 2016 [131]6 = EINE BASIC ZEILE IST LAENGER ALS 255 ZEICHEN,@
  72. 2018 [131]"7 = EIN GOTO ODER THEN BEFEHL ZEIGT AUF EINEN BEFEHL WIE RETURN, GOTO,
  73. 2020 DATA"    END USW., DEN MAN AUCH EINFACH ANSTELLE DES SPRUNGBEFEHLES HAETTE
  74. 2022 [131]"    SETZEN KOENNEN",@
  75. 2024 [131]8 = EIN SPRUNGBEFEHL ZEIGT AUF EINE REM- ODER TRENNZEILE. DIES KANN ZU
  76. 2026 [131]"    PROBLEMEN BEIM ABTIPPEN FUEHREN, WENN DIE ANGESPRUNGENE ZEILE WEG-
  77. 2028 DATA"    GELASSEN WIRD.",@
  78. 2030 DATA9 = EINE BASIC ZEILE IST LAENGER ALS 255 ZEICHEN,@
  79. 2032 DATA10= EIN SPRUNGBEFEHL ZEIGT AUF SICH SELBST (Z.B. 10 GOTO 10),@
  80. 2034 DATA11= DER BEFEHL 'CONT' DARF NICHT IM PROGRAMMTEXT VORKOMMEN,@
  81. 2036 DATA12= DER BEFEHL 'STOP' SOLLTE NICHT IM PROGRAMMTEXT VORKOMMEN,@
  82. 2038 DATA13= DER BEFEHL 'NEW' SOLLTE NICHT IM PROGRAMMTEXT VORKOMMEN,@
  83. 2040 DATA14= DER BEFEHL 'LET' SOLLTE NICHT IM PROGRAMMTEXT VORKOMMEN,@
  84. 2042 DATA15= HINTER EINEM REM-BEFEHL STEHT EIN GESHIFTETES L (LISTSCHUTZ),@
  85. 2044 DATA16= EIN ILLEGALES TOKEN KOMMT IM PROGRAMMTEXT VOR,@
  86. 2046 DATA"17= DER BEFEHL 'GOTO' SOLLTE NICHT DIREKT HINTER 'THEN' STEHEN, EINER
  87. 2048 [131]"    VON BEIDEN GENUEGT",@
  88. 2050 [131]18= HINTER EINEM BEFEHL FEHLT DER PARAMETER,@
  89. 2052 [131]19= HINTER GO FEHLT TO,@
  90. 2054 [131]"20= HINTER GOTO, RUN ETC. FOLGEN WEITERE BEFEHLE, DIE NIEMALS AUSGE-
  91. 2056 DATA"    FUEHRT WERDEN",@
  92. 2058 DATA21= EINE ODER MEHRERE KLAMMERN ZU VIEL ODER ZU WENIG,@
  93. 2060 DATA22= DAS ZEICHEN '^' ZUR POTENZIERUNG SOLLTE VERMIEDEN WERDEN,@
  94. 2062 DATA23= DER BEFEHL 'PRINT#' WURDE MIT ?# ABGEKUERZT,@
  95. 2064 DATA24= FALSCHE REIHENFOLGE DER BASIC-ZEILEN,@
  96. 2066 DATA25= EIN FALSCHER LINKPOINTER KOMMT VOR,@
  97. 2068 DATA26= ON OHNE LEGALEN SPRUNGBEFEHL,@
  98. 2070 DATA27= THEN OHNE IF,@
  99. 2072 DATA28= DER POINTER 45/46 ZEIGT NICHT GENAU AUF DAS ENDE DES BASIC-PRO-
  100. 2074 DATA"    GRAMMES",@
  101. 2100 :
  102. 2102 REM **********************
  103. 2103 REM *                    *
  104. 2104 REM * FRAGEN ?           *
  105. 2106 REM *  NIKOLAUS HEUSLER  *
  106. 2108 REM *  ZWENGAUERWEG 18   *
  107. 2110 REM *  8000 MUENCHEN 71  *
  108. 2112 REM *  TEL. 089/792940   *
  109. 2114 REM *                    *
  110. 2116 REM * REVISED 151287 /NH *
  111. 2117 REM * REVISED 070188 /NH *
  112. 2118 REM *                    *
  113. 2120 REM * (C)OPYRIGHT        *
  114. 2122 REM * NIG SOFTWARE SER-  *
  115. 2123 REM * VICE (NSS),        *
  116. 2124 REM * NH-201187-ARR      *
  117. 2125 REM *                    *
  118. 2126 REM * RELEASED FOR 64'ER *
  119. 2127 REM * LELI-TEST (RS)     *
  120. 2128 REM *                    *
  121. 2130 REM **********************
  122.